home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 July: Mac OS SDK / Dev.CD Jul 99 SDK1.toast / Development Kits / Mac OS / UPDATE- Int&Libs 3.2 / AIncludes / Folders.a < prev    next >
Encoding:
Text File  |  1999-05-25  |  13.3 KB  |  374 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Folders.a
  3. ;
  4. ;    Contains:    Folder Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    Mac OS 8
  7. ;                Release:    Veronica Seed, Use with 3.2 Universal Interfaces
  8. ;
  9. ;    Copyright:    © 1995-1999 by Apple Computer, Inc., all rights reserved.
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__FOLDERS__') = 'UNDEFINED' THEN
  18. __FOLDERS__ SET 1
  19.  
  20.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  21.     include 'MacTypes.a'
  22.     ENDIF
  23.  
  24.  
  25. kOnSystemDisk                    EQU        -32768                ; previously was 0x8000 but that is an unsigned value whereas vRefNum is signed
  26.  
  27. kCreateFolder                    EQU        1
  28. kDontCreateFolder                EQU        0
  29.  
  30. kSystemFolderType                EQU        'macs'                ; the system folder 
  31. kDesktopFolderType                EQU        'desk'                ; the desktop folder; objects in this folder show on the desk top. 
  32. kTrashFolderType                EQU        'trsh'                ; the trash folder; objects in this folder show up in the trash 
  33. kWhereToEmptyTrashFolderType    EQU        'empt'                ; the "empty trash" folder; Finder starts empty from here down 
  34. kPrintMonitorDocsFolderType        EQU        'prnt'                ; Print Monitor documents 
  35. kStartupFolderType                EQU        'strt'                ; Finder objects (applications, documents, DAs, aliases, to...) to open at startup go here 
  36. kShutdownFolderType                EQU        'shdf'                ; Finder objects (applications, documents, DAs, aliases, to...) to open at shutdown go here 
  37. kAppleMenuFolderType            EQU        'amnu'                ; Finder objects to put into the Apple menu go here 
  38. kControlPanelFolderType            EQU        'ctrl'                ; Control Panels go here (may contain INITs) 
  39. kExtensionFolderType            EQU        'extn'                ; System extensions go here 
  40. kFontsFolderType                EQU        'font'                ; Fonts go here 
  41. kPreferencesFolderType            EQU        'pref'                ; preferences for applications go here 
  42. kTemporaryFolderType            EQU        'temp'                ; temporary files go here (deleted periodically, but don't rely on it.) 
  43. ; 
  44. ;    Note:     The FindFolder trap was not implemented until System 7.  If you want to call FindFolder
  45. ;            while running on System 6 machines, then define USE_FINDFOLDER_GLUE and link with
  46. ;            Interface.o which contains glue to implement FindFolder on pre-System 7 machines.
  47. ;
  48.  
  49.     IF &TYPE('USE_FINDFOLDER_GLUE') <> 'UNDEFINED' THEN
  50. ;
  51. ; pascal OSErr FindFolder(short vRefNum, OSType folderType, Boolean createFolder, short *foundVRefNum, long *foundDirID)
  52. ;
  53.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  54.         IMPORT_CFM_FUNCTION FindFolder
  55.     ENDIF
  56.  
  57.     ELSE
  58. ;
  59. ; pascal OSErr FindFolder(short vRefNum, OSType folderType, Boolean createFolder, short *foundVRefNum, long *foundDirID)
  60. ;
  61.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  62.         Macro
  63.         _FindFolder
  64.             moveq               #0,D0
  65.             dc.w                $A823
  66.         EndM
  67.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  68.         IMPORT_CFM_FUNCTION FindFolder
  69.     ENDIF
  70.  
  71.     ENDIF
  72. ;
  73. ; pascal OSErr ReleaseFolder(short vRefNum, OSType folderType)
  74. ;
  75.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  76.         Macro
  77.         _ReleaseFolder
  78.             moveq               #11,D0
  79.             dc.w                $A823
  80.         EndM
  81.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  82.         IMPORT_CFM_FUNCTION ReleaseFolder
  83.     ENDIF
  84.  
  85.  
  86.     IF (forCarbon ++ TARGET_OS_UNIX ++ TARGET_OS_WIN32) THEN
  87. ;  Since non-mac targets don't know about VRef's or DirID's, the Ex version returns
  88. ;   the found folder path.
  89. ; 
  90.  
  91. ;
  92. ; extern OSErr FindFolderEx(short vRefNum, OSType folderType, Boolean createFolder, short *foundVRefNum, long *foundDirID, char *foundFolder)
  93. ;
  94.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  95.         IMPORT_CFM_FUNCTION FindFolderEx
  96.     ENDIF
  97.  
  98.     ENDIF
  99. ; *****************************************
  100. ;  Extensible Folder Manager declarations 
  101. ; *****************************************
  102.  
  103. ; ***************************
  104. ;  Folder Manager constants 
  105. ; ***************************
  106.  
  107.  
  108. kExtensionDisabledFolderType    EQU        'extD'
  109. kControlPanelDisabledFolderType    EQU        'ctrD'
  110. kSystemExtensionDisabledFolderType EQU    'macD'
  111. kStartupItemsDisabledFolderType    EQU        'strD'
  112. kShutdownItemsDisabledFolderType EQU    'shdD'
  113. kApplicationsFolderType            EQU        'apps'
  114. kDocumentsFolderType            EQU        'docs'
  115.  
  116.                                                             ; new constants 
  117. kVolumeRootFolderType            EQU        'root'                ; root folder of a volume 
  118. kChewableItemsFolderType        EQU        'flnt'                ; items deleted at boot 
  119. kApplicationSupportFolderType    EQU        'asup'                ; third-party items and folders 
  120. kTextEncodingsFolderType        EQU        'ƒtex'                ; encoding tables 
  121. kStationeryFolderType            EQU        'odst'                ; stationery 
  122. kOpenDocFolderType                EQU        'odod'                ; OpenDoc root 
  123. kOpenDocShellPlugInsFolderType    EQU        'odsp'                ; OpenDoc Shell Plug-Ins in OpenDoc folder 
  124. kEditorsFolderType                EQU        'oded'                ; OpenDoc editors in MacOS Folder 
  125. kOpenDocEditorsFolderType        EQU        'ƒodf'                ; OpenDoc subfolder of Editors folder 
  126. kOpenDocLibrariesFolderType        EQU        'odlb'                ; OpenDoc libraries folder 
  127. kGenEditorsFolderType            EQU        'ƒedi'                ; CKH general editors folder at root level of Sys folder 
  128. kHelpFolderType                    EQU        'ƒhlp'                ; CKH help folder currently at root of system folder 
  129. kInternetPlugInFolderType        EQU        'ƒnet'                ; CKH internet plug ins for browsers and stuff 
  130. kModemScriptsFolderType            EQU        'ƒmod'                ; CKH modem scripts, get 'em OUT of the Extensions folder 
  131. kPrinterDescriptionFolderType    EQU        'ppdf'                ; CKH new folder at root of System folder for printer descs. 
  132. kPrinterDriverFolderType        EQU        'ƒprd'                ; CKH new folder at root of System folder for printer drivers 
  133. kScriptingAdditionsFolderType    EQU        'ƒscr'                ; CKH at root of system folder 
  134. kSharedLibrariesFolderType        EQU        'ƒlib'                ; CKH for general shared libs. 
  135. kVoicesFolderType                EQU        'fvoc'                ; CKH macintalk can live here 
  136. kControlStripModulesFolderType    EQU        'sdev'                ; CKH for control strip modules 
  137. kAssistantsFolderType            EQU        'astƒ'                ; SJF for Assistants (MacOS Setup Assistant, etc) 
  138. kUtilitiesFolderType            EQU        'utiƒ'                ; SJF for Utilities folder 
  139. kAppleExtrasFolderType            EQU        'aexƒ'                ; SJF for Apple Extras folder 
  140. kContextualMenuItemsFolderType    EQU        'cmnu'                ; SJF for Contextual Menu items 
  141. kMacOSReadMesFolderType            EQU        'morƒ'                ; SJF for MacOS ReadMes folder 
  142. kALMModulesFolderType            EQU        'walk'                ; EAS for Location Manager Module files except type 'thng' (within kExtensionFolderType) 
  143. kALMPreferencesFolderType        EQU        'trip'                ; EAS for Location Manager Preferences (within kPreferencesFolderType; contains kALMLocationsFolderType) 
  144. kALMLocationsFolderType            EQU        'fall'                ; EAS for Location Manager Locations (within kALMPreferencesFolderType) 
  145. kColorSyncProfilesFolderType    EQU        'prof'                ; for ColorSync™ Profiles 
  146. kThemesFolderType                EQU        'thme'                ; for Theme data files 
  147. kFavoritesFolderType            EQU        'favs'                ; Favorties folder for Navigation Services 
  148. kInternetFolderType                EQU        'intƒ'                ; Internet folder (root level of startup volume) 
  149. kAppearanceFolderType            EQU        'appr'                ; Appearance folder (root of system folder) 
  150. kSoundSetsFolderType            EQU        'snds'                ; Sound Sets folder (in Appearance folder) 
  151. kDesktopPicturesFolderType        EQU        'dtpƒ'                ; Desktop Pictures folder (in Appearance folder) 
  152. kInternetSearchSitesFolderType    EQU        'issf'                ; Internet Search Sites folder 
  153. kFindSupportFolderType            EQU        'fnds'                ; Find support folder 
  154. kFindByContentFolderType        EQU        'fbcf'                ; Find by content folder 
  155. kInstallerLogsFolderType        EQU        'ilgf'                ; Installer Logs folder 
  156. kScriptsFolderType                EQU        'scrƒ'                ; Scripts folder 
  157. kFolderActionsFolderType        EQU        'fasf'                ; Folder Actions Scripts folder 
  158. kLauncherItemsFolderType        EQU        'laun'                ; Launcher Items folder 
  159. kRecentApplicationsFolderType    EQU        'rapp'                ; Recent Applications folder 
  160. kRecentDocumentsFolderType        EQU        'rdoc'                ; Recent Documents folder 
  161. kRecentServersFolderType        EQU        'rsvr'                ; Recent Servers folder 
  162. kSpeakableItemsFolderType        EQU        'spki'                ; Speakable Items folder 
  163. kKeychainFolderType                EQU        'kchn'                ; Keychain folder 
  164. kQuickTimeExtensionsFolderType    EQU        'qtex'                ; QuickTime Extensions Folder (in Extensions folder) 
  165.  
  166. kLocalesFolderType                EQU        'ƒloc'                ; PKE for Locales folder 
  167. kFindByContentPluginsFolderType    EQU        'fbcp'                ; Find By Content Plug-ins 
  168. ;  FolderDescFlags values 
  169.  
  170. kCreateFolderAtBoot                EQU        $00000002
  171. kFolderCreatedInvisible            EQU        $00000004
  172. kFolderCreatedNameLocked        EQU        $00000008
  173. ; typedef UInt32                         FolderDescFlags
  174.  
  175. ;  FolderClass values 
  176.  
  177. kRelativeFolder                    EQU        'relf'
  178. kSpecialFolder                    EQU        'spcf'
  179. ; typedef OSType                         FolderClass
  180.  
  181. ;  special folder locations 
  182.  
  183. kBlessedFolder                    EQU        'blsf'
  184. kRootFolder                        EQU        'rotf'
  185. ; typedef OSType                         FolderType
  186.  
  187. ; typedef OSType                         FolderLocation
  188.  
  189.  
  190. FolderDesc                RECORD 0
  191. descSize                 ds.l    1                ; offset: $0 (0)
  192. foldType                 ds.l    1                ; offset: $4 (4)
  193. flags                     ds.l    1                ; offset: $8 (8)
  194. foldClass                 ds.l    1                ; offset: $C (12)
  195. foldLocation             ds.l    1                ; offset: $10 (16)
  196. badgeSignature             ds.l    1                ; offset: $14 (20)
  197. badgeType                 ds.l    1                ; offset: $18 (24)
  198. reserved                 ds.l    1                ; offset: $1C (28)
  199. name                     ds        StrFileName        ; offset: $20 (32)        ;  Str63 on MacOS
  200. sizeof                     EQU *                    ; size:   $60 (96)
  201.                         ENDR
  202. ; typedef struct FolderDesc *            FolderDescPtr
  203.  
  204.  
  205. ; typedef UInt32                         RoutingFlags
  206.  
  207. FolderRouting            RECORD 0
  208. descSize                 ds.l    1                ; offset: $0 (0)
  209. fileType                 ds.l    1                ; offset: $4 (4)
  210. routeFromFolder             ds.l    1                ; offset: $8 (8)
  211. routeToFolder             ds.l    1                ; offset: $C (12)
  212. flags                     ds.l    1                ; offset: $10 (16)
  213. sizeof                     EQU *                    ; size:   $14 (20)
  214.                         ENDR
  215. ; typedef struct FolderRouting *        FolderRoutingPtr
  216.  
  217. ;  routing constants 
  218. ; **************************
  219. ;  Folder Manager routines 
  220. ; **************************
  221. ;  Folder Manager administration routines 
  222. ;
  223. ; pascal OSErr AddFolderDescriptor(FolderType foldType, FolderDescFlags flags, FolderClass foldClass, FolderLocation foldLocation, OSType badgeSignature, OSType badgeType, ConstStrFileNameParam name, Boolean replaceFlag)
  224. ;
  225.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  226.         Macro
  227.         _AddFolderDescriptor
  228.             moveq               #32,D0
  229.             dc.w                $A823
  230.         EndM
  231.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  232.         IMPORT_CFM_FUNCTION AddFolderDescriptor
  233.     ENDIF
  234.  
  235. ;
  236. ; pascal OSErr GetFolderDescriptor(FolderType foldType, Size descSize, FolderDesc *foldDesc)
  237. ;
  238.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  239.         Macro
  240.         _GetFolderDescriptor
  241.             moveq               #35,D0
  242.             dc.w                $A823
  243.         EndM
  244.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  245.         IMPORT_CFM_FUNCTION GetFolderDescriptor
  246.     ENDIF
  247.  
  248. ;
  249. ; pascal OSErr GetFolderTypes(UInt32 requestedTypeCount, UInt32 *totalTypeCount, FolderType *theTypes)
  250. ;
  251.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  252.         Macro
  253.         _GetFolderTypes
  254.             moveq               #36,D0
  255.             dc.w                $A823
  256.         EndM
  257.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  258.         IMPORT_CFM_FUNCTION GetFolderTypes
  259.     ENDIF
  260.  
  261. ;
  262. ; pascal OSErr RemoveFolderDescriptor(FolderType foldType)
  263. ;
  264.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  265.         Macro
  266.         _RemoveFolderDescriptor
  267.             moveq               #33,D0
  268.             dc.w                $A823
  269.         EndM
  270.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  271.         IMPORT_CFM_FUNCTION RemoveFolderDescriptor
  272.     ENDIF
  273.  
  274. ;  legacy routines 
  275. ;
  276. ; pascal OSErr GetFolderName(short vRefNum, OSType foldType, short *foundVRefNum, StrFileName name)
  277. ;
  278.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  279.         Macro
  280.         _GetFolderName
  281.             moveq               #14,D0
  282.             dc.w                $A823
  283.         EndM
  284.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  285.         IMPORT_CFM_FUNCTION GetFolderName
  286.     ENDIF
  287.  
  288. ;  routing routines 
  289. ;
  290. ; pascal OSErr AddFolderRouting(OSType fileType, FolderType routeFromFolder, FolderType routeToFolder, RoutingFlags flags, Boolean replaceFlag)
  291. ;
  292.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  293.         Macro
  294.         _AddFolderRouting
  295.             moveq               #38,D0
  296.             dc.w                $A823
  297.         EndM
  298.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  299.         IMPORT_CFM_FUNCTION AddFolderRouting
  300.     ENDIF
  301.  
  302. ;
  303. ; pascal OSErr RemoveFolderRouting(OSType fileType, FolderType routeFromFolder)
  304. ;
  305.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  306.         Macro
  307.         _RemoveFolderRouting
  308.             moveq               #39,D0
  309.             dc.w                $A823
  310.         EndM
  311.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  312.         IMPORT_CFM_FUNCTION RemoveFolderRouting
  313.     ENDIF
  314.  
  315. ;
  316. ; pascal OSErr FindFolderRouting(OSType fileType, FolderType routeFromFolder, FolderType *routeToFolder, RoutingFlags *flags)
  317. ;
  318.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  319.         Macro
  320.         _FindFolderRouting
  321.             moveq               #34,D0
  322.             dc.w                $A823
  323.         EndM
  324.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  325.         IMPORT_CFM_FUNCTION FindFolderRouting
  326.     ENDIF
  327.  
  328. ;
  329. ; pascal OSErr GetFolderRoutings(UInt32 requestedRoutingCount, UInt32 *totalRoutingCount, Size routingSize, FolderRouting *theRoutings)
  330. ;
  331.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  332.         Macro
  333.         _GetFolderRoutings
  334.             moveq               #30,D0
  335.             dc.w                $A823
  336.         EndM
  337.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  338.         IMPORT_CFM_FUNCTION GetFolderRoutings
  339.     ENDIF
  340.  
  341. ;
  342. ; pascal OSErr InvalidateFolderDescriptorCache(short vRefNum, long dirID)
  343. ;
  344.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  345.         Macro
  346.         _InvalidateFolderDescriptorCache
  347.             moveq               #37,D0
  348.             dc.w                $A823
  349.         EndM
  350.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  351.         IMPORT_CFM_FUNCTION InvalidateFolderDescriptorCache
  352.     ENDIF
  353.  
  354. ;
  355. ; pascal OSErr IdentifyFolder(short vRefNum, long dirID, FolderType *foldType)
  356. ;
  357.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  358.         Macro
  359.         _IdentifyFolder
  360.             moveq               #31,D0
  361.             dc.w                $A823
  362.         EndM
  363.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  364.         IMPORT_CFM_FUNCTION IdentifyFolder
  365.     ENDIF
  366.  
  367.  
  368.  
  369.  
  370.  
  371.  
  372.     ENDIF ; __FOLDERS__ 
  373.  
  374.